/*----------------------------MegaWave2 module----------------------------*/
/* mwcommand
name = {extLignMov};
version = {"1.0"};
author = {"Baptiste Coulange"};
function = {"FFT qui agit au point considéré"};
usage = {	
inM->inM	"Movie entree",
out<-out	"signal sortie",
x->x		"point",
y->y		"point"
	
};
*/
/*----------------------------------------------------------------------
v1.0 (04/2007): initial version
v1.1 : Added gradLoc output
----------------------------------------------------------------------*/

#include <stdio.h>
#include <math.h>
#include "mw.h"



void extLignMov(inM,out,x,y)
	Fmovie inM;
	Fsignal out;
	int x,y;
{
	/* Calcul de la taille */


	Fimage tmp;
	tmp=inM->first;
	int nx;nx=tmp->ncol;
	int pos;pos=0;
	while(tmp->next){
	pos=pos+1;
	tmp=tmp->next;
	}	
	pos=pos+1;
	tmp=inM->first;
	out=mw_change_fsignal(out,pos);
	out->values[0]=tmp->gray[y*nx+x];

	pos=0;
	while(tmp->next){
		tmp=tmp->next;
		pos=pos+1;
		out->values[pos]=tmp->gray[y*nx+x];	
	}

}
